Het is mogelijk procedures Property Let, Property Set en Property Get te maken die allen dezelfde naam hebben. U maakt zo een groep verwante procedures die met elkaar samenwerken. Als een naam eenmaal voor een procedure Property is gebruikt, kan die naam niet meer voor een procedure Sub of Function, een variabele of een door de gebruiker gedefinieerd type worden gebruikt.
Met de instructie Property Let kunt u een procedure maken die de waarde van de eigenschap instelt. Een voorbeeld hiervan is een procedure Property die een ge∩nverteerde eigenschap maakt voor een bitmap op een formulier. Dit is de syntaxis die gebruikt wordt voor het oproepen van de procedure Property Let:
Form1.Inverted = True
Het eigenlijke inverteren wordt binnen de procedure Property Let gedaan:
Private IsInverted As Boolean
Property Let Inverted(X As Boolean)
IsInverted = X
If IsInverted Then
à
(statements)
Else
(statements)
End If
End Property
De instelling van uw eigenschap wordt opgeslagen in de variabele IsInverted. Als deze Private is gedeclareerd, kan deze alleen met de procedure Property Let worden gewijzigd. Gebruik een naam waaraan eenvoudig te herkennen is dat de variabele voor die eigenschap wordt gebruikt.
Deze procedure Property Get wordt gebruikt om de huidige instelling van de eigenschap Inverted af te beelden:
Property Get Inverted() As Boolean
Inverted = IsInverted
End Property
Met behulp van procedures Property is het makkelijk om tijdens het instellen van de waarde van een eigenschap programmacode uit te voeren. U kunt met procedures Property de volgende bewerkingen uitvoeren: